﻿Namespace ViewModel

    Public Class SettingWindowViewModel
        Inherits ViewModelbase

        Private _Interval As Integer = 1000
        Public Property Interval As Integer
            Get
                Return _Interval
            End Get
            Set(ByVal value As Integer)
                If _Interval <> value Then
                    OnPropertyChanged("Interval")
                    _Interval = value
                End If
            End Set
        End Property

    End Class

End Namespace
